home *** CD-ROM | disk | FTP | other *** search
/ Amiga Times / AmigaTimes.iso / demos / programme / WarpUPV3 / WarpUP Install-Script < prev    next >
Encoding:
Text File  |  1998-10-06  |  23.8 KB  |  688 lines
  1. ;*************************************************************************
  2. ;*  WarpUP CD-Installer Version 14   15 April 1998                       *
  3. ;*                                                                       *
  4. ;*  ©1998 HAAGE & PARTNER Computer GmbH                                  *
  5. ;*                                                                       *
  6. ;*  If you have any installer questions please let us know!              *
  7. ;*                                                                       *
  8. ;*************************************************************************
  9. ;
  10. ; $VER: WarpUP V14.1 Install Version 2.0 (07.04.98)
  11.  
  12. (complete 0)
  13.  
  14. ; Die Versionsnummer und das Erstellungs-Datum der hier installierten
  15. ; Versionen.
  16.  
  17. (set #warpup-version "Version 14.1")
  18. (set #warpup-date "(15.03.98)")
  19.  
  20. ; // Die Dateigrößen
  21.  
  22. (set #size-komplett 4) ; MByte CD-Installation
  23.  
  24. ;====================================================================
  25. ; Initialisierungen
  26.  
  27. ; --- English strings ---
  28.  
  29.     (set #yeskey "Yes")
  30.     (set #nokey "No")
  31.  
  32.     (set #wrongos "\n Sorry, you will need OS2.04 or better\n")
  33.  
  34.     (set #wrongcpu "\n Sorry, you will need min. a 68020 CPU to use StormC\n")
  35.  
  36.     (set #welcome (cat "\n\n"
  37.         "Welcome to the installation of the new\n\n"
  38.         "PowerPC native exec kernel WarpUP-WarpOS.\n\n"
  39.         ""#warpup-version " of "#warpup-date"\n\n"
  40.         "This script copies the WarpUP-Libraries\n"
  41.         "to your harddisk!\n\n"
  42.         "© 98 HAAGE&PARTNER Computer GmbH\n"
  43.         ))
  44.     (set #boardsoptstxt "Please choose your Board")
  45.     (set #noboards "No PPC-Board available")
  46.     (set #cyberstorm "CyberStormPPC A3000/A4000")
  47.     (set #developerboard "CyberStorm Developerboard")
  48.     (set #blizzard "Blizzard PPC A1200")
  49.  
  50.     (set #boardopts_help (cat "\n"
  51.         "The 'warpHW.library' is the hardware driver for the WarpUp-HAL. In the"
  52.         "directory 'hwdrivers' there are detailed documentation and examples sources"
  53.         "which allow everyone to write WarpUp drivers for new PPC hardware. For"
  54.         "every hardware there exists a library 'warpHW.library'. It is absolutely"
  55.         "necessary that the correct library is installed. This can be tested by"
  56.         "running the tool 'GetDriverInfo' (in the 'tools' directory) which prints"
  57.         "out, which hardware is represented by this driver."
  58.         ))
  59.  
  60.  
  61.     (set #envoptstxt "Please choose your settings!")
  62.  
  63.     (set #envdebug "Debug-Modus")
  64.     (set #envmemprot "PPC memory protection")
  65.     (set #envearlyterm "WShell compatible")
  66.     (set #envnoppc "PPC board not available")
  67.     (set #envhidewarning "Ignore warnings")
  68.     (set #envterminator "PPC.lib autoterminator")
  69.  
  70.     (set #envopts_help ( cat "\n"
  71.         "Settings\n\n"
  72.         "WarpOS knows some env-variables that can be used to make certain preferences."
  73.         "The following are currently supported:\n\n"
  74.  
  75.         "Debug Modus - env:powerpc/debug\n\n"
  76.  
  77.         "May contain a number between 0 and 3. This specifies the debugging-level to"
  78.         "use when WarpOS boots. Should usually be left at 0 unless you are interested"
  79.         "in what happens during the booting process. The debugging-level can be changed"
  80.         "during operation by using the 'setdb' tool."
  81.  
  82.         "PPC memory protection - env:powerpc/memprot\n\n"
  83.  
  84.         "Can be either 0 or 1. If it is set to 1, the memory-protection facilities of"
  85.         "WarpOS are switched on, otherwise off. If low-memory situations occur it can"
  86.         "help to switch off memory protection."
  87.  
  88.         "PPC board not available - env:powerpc/noPPC\n\n"
  89.  
  90.         "This variable must be set, if the powerpc.library V8+ is installed on a"
  91.         "Non-PPC system. Afterwards all demos which also run without PPC (but which"
  92.         "try to open the powerpc.library) should run. If the variable is not set,"
  93.         "then the library crashes at initialization."
  94.  
  95.         "WShell compatible - env:powerpc/earlyterm\n\n"
  96.  
  97.         "If this variable is not set, then problems can occur in conjunction with"
  98.         "programs like WShell. In this case the variable should be set. Afterwards,"
  99.         "the tools 'stackppc' and 'changemmu' can NOT be used anymore. The PPC stack"
  100.         "can be set using the stack command (the PPC stack gets about double the"
  101.         "size of the 68K stack of the shell)."
  102.  
  103.         "PPC.lib autoterminator - env:powerpc/Terminator\n\n"
  104.  
  105.         "If this variable is set to 1, then it's possible to launch WarpOS even if"
  106.         "the ppc.library is active. WarpOS tries then to remove the ppc.library and"
  107.         "related resources from the operating system. Of course it is still not"
  108.         "possible to use both ppc.library and WarpOS at the same time."
  109.  
  110.         "Ignore warnings - env:powerpc/HideWarning\n\n"
  111.  
  112.         "If this variable is set to 1, the appearance of the requesters, which come"
  113.         "up in conjunction with ppc.library Warning, is avoided."
  114.           ))
  115.  
  116.     (set #stormc_install_powerpclib "Copy libraries to Libs:")
  117.     (set #stormc_install_powerpclib_help "You need this library for using WarpOS")
  118.  
  119.     (set #versoptstxt "Do you want to install WarpOS V14 or the compatible V7?")
  120.     (set #warpos "WarpOS V14")
  121.     (set #s-lib "compatible version 7")
  122.     (set #boardsopt-help (cat "\n"
  123.         "Very important: As soon as WarpOS has been booted, absolutely NO PPC-programs"
  124.         "that are present in ELF-format will run. If compatibility with ELF-programs is"
  125.         "desired, the powerpc.library version 7 must be installed - after that,"
  126.         "ELF-programs as well as programs using the extended hunk-format will run. The"
  127.         "price you have to pay for this is a miserable performance when"
  128.         "context-switches between the CPUs occur. Furthermore, most of the features of"
  129.         "WarpOS will not be usable (version 7 is not an operating system in its own"
  130.         "right)."
  131.         ))
  132.  
  133.     (set #endsuccess "\n\nInstallation successfull")
  134.  
  135. (if (= @language "deutsch") (
  136.  
  137.  
  138.     (set #yeskey "Ja")
  139.     (set #nokey "Nein")
  140.  
  141.     (set #wrongos "\n Sorry, dieses Paket benötigt mind. OS2.04.\n")
  142.  
  143.     (set #wrongcpu "\n Sorry, das StormC-Paket setzt eine 68020 CPU voraus!\n")
  144.  
  145.     (set #welcome (cat "\n\nWillkommen bei der Installation des neuen\n"
  146.         "PowerPC nativen Exec Kernels WarpUP-WarpOS.\n\n"
  147.         ""#warpup-version " vom "#warpup-date"\n\n"
  148.         "Dieses Skript kopiert die verschiedenen\n"
  149.         "Bibliotheken, aus denen sich WarpUP-WarpOS\n"
  150.         "zusammensetzt auf Ihre Festplatte.\n\n"
  151.         "© 98 HAAGE&PARTNER Computer GmbH\n"
  152.         ))
  153.  
  154.     (set #boardsoptstxt "Bitte Boardtyp auswaehlen")
  155.     (set #noboards "Kein PPC-Board vorhanden")
  156.     (set #cyberstorm "CyberStormPPC A3000/A4000")
  157.     (set #developerboard "CyberStorm Developerboard")
  158.     (set #blizzard "Blizzard PPC A1200")
  159.  
  160.     (set #boardopts_help (cat "\n"
  161.         "Wählen Sie bitte das entsprechende, in Ihrem Amiga eingebaute PowerPC-Board aus."
  162.         "Wenn Sie noch ueber kein Board verfuegen, wählen Sie einfach \"Kein PPC-Board vorhanden\"."
  163.         "Sie könenn dann dennoch die beigefuegten Demos ablaufen lassen.\n\n"
  164.         "Die 'warpHW.library' ist der Hardware-Treiber fuer den WarpUp-HAL. Im"
  165.         "Verzeichnis 'hwdrivers' befindet sich eine ausfuehrliche Dokumentation und"
  166.         "Beispiel-Sourcen, welche es jedermann erlauben, WarpUp-Treiber fuer neue"
  167.         "PPC-Hardware zu entwickeln. Fuer jede Hardware gibt es eine warpHW.library."
  168.         "Es muss natuerlich die korrekte Version installiert sein. Dies kann man"
  169.         "ueberpruefen, indem man das Programm 'GetDriverInfo' (im 'tools'-Verzeichnis)"
  170.         "laufen laesst, welches in der Shell ausgibt, welche Hardware der Treiber"
  171.         "repraesentiert."
  172.         ))
  173.  
  174.  
  175.     (set #envoptstxt "Bitte wählen Sie Ihre Einstellung!")
  176.  
  177.     (set #envdebug "Debug-Modus")
  178.     (set #envmemprot "PPC-Speicherschutz")
  179.     (set #envearlyterm "WShell-Kompatibel")
  180.     (set #envnoppc "PPC-Board ausgebaut")
  181.     (set #envhidewarning "Warnungen ignorieren")
  182.     (set #envterminator "PPC.lib Autoterminator")
  183.  
  184.     (set #envopts_help ( cat "\n"
  185.           "Voreinstellungen\n\n"
  186.           "WarpOS kennt einige Env-Variablen, womit gewisse Voreinstellungen gemacht"
  187.           "werden können. Zur Zeit sind folgende unterstützt:\n\n"
  188.  
  189.           "Debug-Modus - env:powerpc/debug\n\n"
  190.  
  191.           "Kann eine Ziffer zwischen 0 und 3 beinhalten. Damit wird der Debugging-Level"
  192.           "beim Aufstarten von WarpOS festgelegt. Sollte normalerweise auf 0 belassen"
  193.           "werden, ausser jemand interessiert sich für die Vorgänge beim Bootvorgang."
  194.           "Der Debugging-Level kann nachträglich mit dem Tool-Programm 'setdb' eingestellt"
  195.           "werden.\n\n"
  196.  
  197.           "PPC-Speicherschutz - env:powerpc/memprot\n\n"
  198.  
  199.           "Kann entweder 0 oder 1 sein. Wenn es auf 1 gesetzt ist, sind die Speicher-"
  200.           "schutzmöglichkeiten von WarpOS eingeschaltet, ansonsten ausgeschaltet. Wenn"
  201.           "eventuell Speicherplatzprobleme auftauchen, kann es helfen, den Speicherschutz"
  202.           "zu deaktivieren.\n\n"
  203.  
  204.           "PPC-Board ausgebaut - env:powerpc/noPPC\n\n"
  205.  
  206.           "Diese Variable muss gesetzt sein, wenn die powerpc.library V8+ auf einem"
  207.           "Nicht-PPC-System installiert wird. Danach funktionieren alle Demos, welche"
  208.           "auch ohne PPC laufen, aber die powerpc.library zu öffnen versuchen. Ist"
  209.           "die Variable dann nicht gesetzt, stürzt die Library in der Initialisierung"
  210.           "ab.\n\n"
  211.  
  212.           "WShell-Kompatibilität - env:powerpc/earlyterm\n\n"
  213.  
  214.           "Wenn diese Variable nicht gesetzt ist, kann es im Zusammenhang mit Programmen"
  215.           "wie der WShell zu grossen Problemen kommen, in diesem Fall sollte diese"
  216.           "Variable gesetzt werden. Dann können aber die Tool-Programme 'stackppc' und"
  217.           "'changemmu' nicht mehr benützt werden. Der PPC-Stack kann dann aber mit dem"
  218.           "Stack-Befehl gesetzt werden (Der PPC-Stack ist etwa doppelt so gross wie der"
  219.           "68K-Stack der Shell).\n\n"
  220.  
  221.           "PPC.lib Autoterminator - env:powerpc/Terminator\n\n"
  222.  
  223.           "Wenn diese Variable auf 1 gesetzt ist, so wird die Moeglichkeit geschaffen,"
  224.           "WarpOS hochzufahren, auch wenn die ppc.library aktiviert ist. Zu dem Zweck"
  225.           "wird versucht, die ppc.library und verwandte Resourcen aus dem Betriebssystem"
  226.           "zu entfernen. Natuerlich koennen bei laufendem WarpOS dann immer noch keine"
  227.           "ppc.library-Applikationen benuetzt werden.\n\n"
  228.  
  229.           "Warnungen ignorieren - env:powerpc/HideWarning\n\n"
  230.  
  231.           "Wenn diese Variable auf 1 gesetzt ist, so wird das Erscheinen der Requester"
  232.           "verhindert, welche im Zusammenhang mit der ppc.library erscheinen und dem"
  233.           "User mitteilen, dass WarpOS nicht so ohne weiteres hochfahren kann."
  234.           ))
  235.  
  236.     (set #stormc_install_powerpclib "Kopiere die Bibliotheken nach Libs:")
  237.     (set #stormc_install_powerpclib_help "Die Bibliothek wird zwangsläufig zum Betrieb benoetigt.")
  238.  
  239.     (set #versoptstxt "Möchten Sie WarpOS V14 oder die kompatible V7 installieren")
  240.     (set #warpos "WarpOS V14")
  241.     (set #s-lib "Kompatible Version 7")
  242.     (set #boardsopt-help (cat "\n"
  243.         "Sehr wichtig: Sobald WarpOS hochgefahren wurde, laufen absolut KEINE"
  244.         "PPC-Programme, die im ELF-Format vorliegen. Wenn unbedingt Kompatibilität"
  245.         "zu ELF-Programmen erwünscht ist, muss die powerpc.library Version 7"
  246.         "installiert werden, wonach sowohl ELF-Programme wie auch Programme im"
  247.         "erweiterten Hunkformat laufen. Der Preis dafür ist schlechte Performance"
  248.         "bei Kontextwechseln zwischen den CPUs. Zudem sind die meisten Features des"
  249.         "WarpOS nicht zugänglich (Die Version V7 ist kein eigenständiges Betriebs-"
  250.         "system)."
  251.         ))
  252.     (set #endsuccess "\n\nInstallation erfolgreich beendet")
  253. ))
  254.  
  255. (if (= @language "italiano") (
  256.  
  257.  
  258.     (set #yeskey "Si")
  259.     (set #nokey "No")
  260.  
  261.     (set #wrongos "\n Spiacente, é necessario OS2.04 or superiore.\n")
  262.  
  263.     (set #wrongcpu "\n Spiacente, é necessario al minimo una CPU 68020 o superiore per usare WarpOS\n")
  264.  
  265.     (set #welcome (cat "\n\n"
  266.         "Benvenuto all'installazione del nuovo\n\n"
  267.         "kernel nativo per PowerPC WarpUP-WarpOS.\n\n"
  268.         ""#warpup-version " del "#warpup-date"\n\n"
  269.         "Questo script copia le librerie WarpUP\n"
  270.         "sul tuo harddisk!\n\n"
  271.         "© 98 HAAGE&PARTNER Computer GmbH\n"
  272.         ))
  273.     (set #boardsoptstxt "Scegli la tua scheda:")
  274.     (set #noboards "Nessuna scheda PPC")
  275.     (set #cyberstorm "CyberStormPPC A3000/A4000")
  276.     (set #developerboard "CyberStorm Developerboard")
  277.     (set #blizzard "Blizzard PPC A1200")
  278.  
  279.     (set #boardopts_help (cat "\n"
  280.         "La 'warpHW.library' é il driver hardware per il WarpUp-HAL. Nella"
  281.         "directory 'hwdrivers' c'è tutta la documentazione dettagliata e dei"
  282.         "sorgenti di esempio che consentono a chiunque di scrivere dei driver WarpUp"
  283.         "per del nuovo hardware PPC."
  284.         "Per ogni hardware esistente c'è una libreria 'warpHW.library'. E` assolutamente"
  285.         "necessario che sia installata la libreria corretta. Ci˜ pu˜ essere controllato"
  286.         "tramite il comando 'GetDriverInfo' (che si trova nella directory 'tools' ) che"
  287.         "stampa quale hardware é rappresentato da questo driver."
  288.         ))
  289.  
  290.     (set #envoptstxt "Scegli le tue impostazioni!")
  291.  
  292.     (set #envdebug "Livello di Debug")
  293.     (set #envmemprot "Protezione di memoria sotto PPC.")
  294.     (set #envearlyterm "Compatibilità con WShell")
  295.     (set #envnoppc "Scheda PPC non disponibile")
  296.     (set #envhidewarning "Ignorare i 'warnings'")
  297.     (set #envterminator "Autonuclearizzazione PPC.library")
  298.  
  299.     (set #envopts_help ( cat "\n"
  300.         "Impostazioni:\n\n"
  301.         "WarpOS usa alcune variabili di ambiente (env-variables) che possono essere usate"
  302.         "per cabiare alcune opzioni."
  303.         "Le opzioni seguenti sono supportate al momento attuale:\n\n"
  304.  
  305.         "Livello di Debug - env:powerpc/debug\n\n"
  306.  
  307.         "Può contenere un numero compreso tra 0 e 3. Questo specifica il livello di debugging"
  308.         "da usare quando WarpOS parte. Di solito andrebbe lasciato a 0 a meno che tu sia"
  309.         "interessato in ciò che accade durante il processo di boot. Il livello di debugging"
  310.         "può essere cambiato durante l'utilizzo normale tramite il comando 'setdb'."
  311.  
  312.         "Protezione di memoria sotto PPC. - env:powerpc/memprot\n\n"
  313.  
  314.         "Può essere o 0 oppure 1. Se imposatao a 1, le risorse di protezione della memoria"
  315.         "di WarpOS saranno attive, altrimenti no. Se capitano delle situazioni di poca"
  316.         "memoria, può essere d'aiuto disattivare la protezione della memoria."
  317.  
  318.         "Scheda PPC non disponibile - env:powerpc/noPPC\n\n"
  319.  
  320.         "Queata variabile DEVE essere impostata, se la powerpc.library V8+ è installata"
  321.         "in un sistema senza PPC. Dopodiché tutti i demo che possono anche girare senza"
  322.         "PPC (ma che provano ad aprire la powerpc.library) dovrebbero girare. Se la variabile"
  323.         "non é impostata allora la libreria si pianta allegramente all'inizializzazione."
  324.  
  325.         "Compatibilità con WShell - env:powerpc/earlyterm\n\n"
  326.  
  327.         "Se questa variable non é impostata, allora possono esserci dei problemi con"
  328.         "programmi come WShell. In questo caso, la variabile deve venire impostata."
  329.         "Dopodiché, i programmi 'stackppc' e 'changemmu' NON possono essere più usati. Lo"
  330.         "stack PPC può essere impostato usando il comando standard 'stack' (lo stack PPC"
  331.         "avrà una dimensione doppia dello stack 68K della shell)."
  332.  
  333.         "Autoterminazione PPC.library - env:powerpc/Terminator\n\n"
  334.  
  335.         "Se questa variabile é impostata a 1, allora é possibile launciare WarpOS anche"
  336.         "se la ppc.library é attiva. WarpOS proverà quindi a rimuovere la ppc.library e"
  337.         "le relative risorse dal sistema operativo. Naturalmente non é ancora possibile"
  338.         "usare sia la ppc.library che WarpOS allo stesso tempo."
  339.         "I possessori di BlizzardPPC DEVONO impostare a 1 questa variabile per poter usare"
  340.         "WarpOS."
  341.  
  342.         "Ignorare i 'warnings' - env:powerpc/HideWarning\n\n"
  343.  
  344.         "Con questa variabile impostata a 1, l'apparizione dei requester, che"
  345.         "apparirebbero per l'avvertimento della rimozione della ppc.library, sarà evitata."
  346.         "E' utile se si installa WarpOS in un sistema in contemporanea con la ppc.library."
  347.           ))
  348.  
  349.     (set #stormc_install_powerpclib "Copia delle librerie in Libs:")
  350.     (set #stormc_install_powerpclib_help "E' necessaria questa libreria per usare WarpOS")
  351.  
  352.     (set #versoptstxt "Vuoi installare WarpOS V14 o la versione compatibile V7?")
  353.     (set #warpos "WarpOS V14")
  354.     (set #s-lib "compatibile V7")
  355.     (set #boardsopt-help (cat "\n"
  356.         "NOTA BENE: Dal momento in cui WarpOS viene lanciato, NESSUN programma PPC"
  357.         "che é presente in formato ELF funzionerà più. Se si desidera la compatibilità"
  358.         "con programmi ELF, deve venire installata la powerpc.library versione 7 - dopo,"
  359.         "ciò, funzioneranno sia i programmi ELF che quelli che usano il formato di hunk"
  360.         "esteso (WarpOS). Il prezzo che dovrai pagare per questo é una prestazione"
  361.         "miserevole durante i context-switches tra CPU. Oltretutto, molte delle capacità"
  362.         "di WarpOS non saranno utilizzabili (la versione 7 NON è un sistema operativo vero"
  363.         "e proprio)."
  364.         ))
  365.  
  366.     (set #endsuccess "\n\nL'installazione ha avuto successo. Buon divertimento.")
  367. ))
  368.  
  369. (set #os-version (/ (getversion) 65536))
  370. (set #os-13 (< #os-version 36))
  371. (set #os-20 (>= #os-version 36))
  372. (set #os-21 (>= #os-version 38))
  373.  
  374. ; ------------ Die Pfadnamen der einzelnen Quell-Dateien ----------------
  375.  
  376. (set #ppcv7 (tackon (pathonly @icon) "WarpUP-WarpOS/V7/PowerPC.library"))
  377. (set #dummyelf (tackon (pathonly @icon) "WarpUP-WarpOS/V7/dummy.elf"))
  378. (set #hw1 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/CyberStormPPC/warpHW.library"))
  379. (set #hw2 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/P5Developerboard/warpHW.library"))
  380. (set #hw3 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/BlizzardPPC/warpHW.library"))
  381. (set #ppcv14 (tackon (pathonly @icon) "WarpUP-WarpOS/libs/PowerPC.library"))
  382. (set #warpV14 (tackon (pathonly @icon) "WarpUP-WarpOS/libs/Warp.library"))
  383.  
  384. ;=====================================================================================
  385. ; // Beginn der Installation
  386. ;=====================================================================================
  387.  
  388. ; // wird min. unter 2.04 installiert ?
  389.  
  390. (if (= #os-13 1)
  391.  
  392.     (
  393.         (message #wrongos)
  394.  
  395.         (exit (quiet))
  396.     )
  397. )
  398.  
  399. (if (patmatch "68000|68010" (database "cpu"))
  400.     (
  401.         (message #wrongcpu)
  402.         (exit (quiet))
  403.     )
  404. )
  405.  
  406. (onerror (
  407.     (if (> @ioerr 0)
  408.         (message (cat "\n ERROR CODE: " @ioerr "\n\n"))
  409.     )
  410. ))
  411.  
  412. ; // Eine kleine Einleitung, gefolgt vom Startbild des Installers.
  413.  
  414.  
  415. (message #welcome)
  416.  
  417. ;(welcome)
  418.  
  419. (complete 2)
  420.  
  421. ; // Alte Version prüfen und entsprechende Abfrage ausgeben!--------------------------------------------
  422.  
  423. (set #folder "SYS:")
  424.  
  425. ; Libs auf die Platte kopieren
  426.  
  427. (complete 10)
  428.  
  429. (set #noppc (getenv "PowerPC/noppc"))
  430.  
  431. (set #boardopts
  432.     (askchoice
  433.         (prompt #boardoptstxt)
  434.         (help #boardopts_help)
  435.         (choices #noboards #cyberstorm #developerboard #blizzard)
  436.         (default 1)
  437.     )
  438. )
  439.  
  440. (if (= #boardopts 0)
  441.     ((set #noppc 1))
  442. )
  443.  
  444. (set destenvarc (tackon "envarc:" "PowerPC"))
  445. (set destenv (tackon "env:" "PowerPC"))
  446. (if                                         ; // Verzeichnis für Envargumente erzeugen
  447.    (= (exists destenvarc) 0)
  448.     (
  449.       (makedir destenvarc (infos))
  450.       (makedir destenv (infos))
  451.  
  452.       (set #alertfile "CON:0/20/400/200/WarpOS - System Message/AUTO/CLOSE/WAIT/INACTIVE")
  453.  
  454.       (run "setenv PowerPC/alertfile" #alertfile)
  455.       (run "copy ENV:PowerPC/alertfile ENVARC:PowerPC")
  456.  
  457.       (set #crashfile "CON:0/20/400/300/WarpOS - PowerPC Exception/AUTO/CLOSE/WAIT/INACTIVE")
  458.  
  459.       (run "setenv PowerPC/crashfile" #crashfile)
  460.       (run "copy ENV:PowerPC/crashfile ENVARC:PowerPC")
  461.  
  462.       (run "setenv PowerPC/gfxaddr" 0)
  463.       (run "copy ENV:PowerPC/gfxaddr ENVARC:PowerPC")
  464.  
  465.       (set #debug 0)
  466.       (set #gfxaddr 0)
  467.       (set #memprot 1)
  468.       (set #earlyterm 0)
  469.       (set #hidewarning 0)
  470.       (set #terminator 1)
  471.     )
  472.     (
  473.       (set #alertfile (getenv "PowerPC/alertfile"))
  474.       (set #crashfile (getenv "PowerPC/crashfile"))
  475.       (set #debug (getenv "PowerPC/debug"))
  476.       (set #gfxaddr (getenv "PowerPC/gfxaddr"))
  477.       (set #memprot (getenv "PowerPC/memprot"))
  478.       (set #earlyterm (getenv "PowerPC/earlyterm"))
  479.       (set #hidewarning (getenv "PowerPC/hidewarning"))
  480.       (set #terminator (getenv "PowerPC/terminator"))
  481.     )
  482. )
  483.  
  484. (set #envopts 0)
  485.  
  486. (if (= #debug 1)
  487.    (
  488.    (set #envopts (bitor #envopts 1))
  489.    )
  490. )
  491.  
  492. (if (= #memprot 1)
  493.    (
  494.    (set #envopts (bitor #envopts 2))
  495.    )
  496. )
  497.  
  498. (if (= #earlyterm 1)
  499.    (
  500.    (set #envopts (bitor #envopts 4))
  501.    )
  502. )
  503.  
  504. (if (= #noppc 1)
  505.    (
  506.    (set #envopts (bitor #envopts 8))
  507.    )
  508. )
  509.  
  510. (if (= #hidewarning 1)
  511.    (
  512.    (set #envopts (bitor #envopts 16))
  513.    )
  514. )
  515.  
  516. (if (= #terminator 1)
  517.    (
  518.    (set #envopts (bitor #envopts 32))
  519.    )
  520. )
  521.  
  522. ;==================================================================================
  523. (complete 40)
  524.  
  525. (set #envopts
  526.     (askoptions
  527.         (prompt #envoptstxt)
  528.         (help #envopts_help)
  529.         (choices #envdebug #envmemprot #envearlyterm #envnoppc #envhidewarning #envterminator)
  530.         (default #envopts)
  531.     )
  532. )
  533.  
  534. (complete 50)
  535.  
  536. (if (= 1 (bitand #envopts 1))
  537.     (
  538.     (set #debug 1)
  539.     )
  540.     (
  541.     (set #debug 0)
  542.     )
  543. )
  544.  
  545. (if (= 2 (bitand #envopts 2))
  546.     (
  547.     (set #memprot 1)
  548.     )
  549.     (
  550.     (set #memprot 0)
  551.     )
  552. )
  553.  
  554. (if (= 4 (bitand #envopts 4))
  555.     (
  556.     (set #earlyterm 1)
  557.     )
  558.     (
  559.     (set #earlyterm 0)
  560.     )
  561. )
  562.  
  563. (if (= 8 (bitand #envopts 8))
  564.     (
  565.     (set #noppc 1)
  566.     )
  567.     (
  568.     (set #noppc 0)
  569.     )
  570. )
  571.  
  572. (if (= 16 (bitand #envopts 16))
  573.     (
  574.     (set #hidewarning 1)
  575.     )
  576.     (
  577.     (set #hidewarning 0)
  578.     )
  579. )
  580.  
  581. (if (= 32 (bitand #envopts 32))
  582.     (
  583.     (set #terminator 1)
  584.     )
  585.     (
  586.     (set #terminator 0)
  587.     )
  588. )
  589.  
  590. (run "setenv PowerPC/debug" #debug)
  591. (run "copy ENV:PowerPC/debug ENVARC:PowerPC")
  592.  
  593. (run "setenv PowerPC/memprot" #memprot)
  594. (run "copy ENV:PowerPC/memprot ENVARC:PowerPC")
  595.  
  596. (run "setenv PowerPC/earlyterm" #earlyterm)
  597. (run "copy ENV:PowerPC/earlyterm ENVARC:PowerPC")
  598.  
  599. (run "setenv PowerPC/noppc" #noppc)
  600. (run "copy ENV:PowerPC/noppc ENVARC:PowerPC")
  601.  
  602. (run "setenv PowerPC/hidewarning" #hidewarning)
  603. (run "copy ENV:PowerPC/hidewarning ENVARC:PowerPC")
  604.  
  605. (run "setenv PowerPC/terminator" #terminator)
  606. (run "copy ENV:PowerPC/terminator ENVARC:PowerPC")
  607.  
  608. (complete 70)
  609.  
  610. (set #versopts
  611.     (askchoice
  612.         (prompt #versoptstxt)
  613.         (help #boardopts_help)
  614.         (choices #warpos #s-lib)
  615.         (default 0)
  616.     )
  617. )
  618.  
  619. (if (= #versopts 1)
  620.     (
  621.        (copylib
  622.            (prompt  #stormc_install_powerpclib)
  623.            (help    #stormc_install_powerpclib_help)
  624.            (source  #ppcv7)
  625.            (dest    "libs:")
  626.            (confirm)
  627.        )
  628.  
  629.        (complete 80)
  630.  
  631.        ; Dummy Elf kopieren
  632.  
  633.        (copyfiles
  634.            (prompt  #stormc_install_powerpclib)
  635.            (help    #stormc_install_powerpclib_help)
  636.            (dest "S:")
  637.            (source #dummyelf)
  638.        )
  639.     )
  640.     (     ; WarpOS installieren
  641.  
  642.        (if (= #boardopts 1)
  643.            ( (set #hwdriver #hw1)
  644.            ))
  645.  
  646.        (if (= #boardopts 2)
  647.            ( (set #hwdriver #hw2)
  648.            ))
  649.  
  650.        (if (= #boardopts 3)
  651.            ( (set #hwdriver #hw3)
  652.            ))
  653.  
  654.        (copyfiles
  655.            (prompt  #stormc_install_powerpclib)
  656.            (help    #stormc_install_powerpclib_help)
  657.            (source   #hwdriver)
  658.            (dest    "libs:")
  659. ;           (confirm)
  660.        )
  661.  
  662.       (complete 80)
  663.  
  664.        (copylib
  665.            (prompt  #stormc_install_powerpclib)
  666.            (help    #stormc_install_powerpclib_help)
  667.            (source  #ppcv14)
  668.            (dest    "libs:")
  669.            (confirm)
  670.        )
  671.  
  672.        (complete 90)
  673.  
  674.        (copylib
  675.            (prompt  #stormc_install_powerpclib)
  676.            (help    #stormc_install_powerpclib_help)
  677.            (source  #warpV14)
  678.            (dest    "libs:")
  679.            (confirm)
  680.        )
  681.  
  682.     )
  683. )
  684.  
  685. (complete 100)
  686.  
  687. (exit #endsuccess (quiet))
  688.